# Ввести строку-шаблон, затем вводить строки примеры; окончание ввода — пустая строка. Вывести в виде «Duplicates: число» количество строк-примеров, совпадающих с шаблоном.
# Все входные строки короче 100 байтов. 

.include "string.inc"    	# В Д/З сюда надо вставить string.inc и string.asm
.include "string.asm"

.globl	main

.data
buf:	.space  STRSIZE		# 101

.text
main:   li      s3 0
        strget  s1 s2           # jal _strget; a0→s1 (aдрес), a2→s2 (длина)
        la      s4 buf
        li      s5 STRSIZE      # 101
loop:   syscall 8 s4 s5         # s4→a0, s5→a1; ecall 8
        strip   s4 '\n'         # Вспомогательная процедура удаления хвостового '\n'
        strlen  s4 t6           # s4→a0; jal _strlen; a0→t6
        beqz    t6 done
        strcmp  s1 s4 t0        # s1→a0, s4→a1; jal _strcmp; a0→t0
        bnez    t0 loop
        addi    s3 s3 1
        b       loop
done:   print	"Duplicates: " s3 # Удобно для отладки, но и тут пригодилось
        syscall 10
